﻿Public Class LichGanLapDto
    Dim _MaLichGan As Long
    Dim _ThuHai As Boolean
    Dim _ThuBa As Boolean
    Dim _ThuTu As Boolean
    Dim _ThuNam As Boolean
    Dim _ThuSau As Boolean
    Dim _ThuBay As Boolean
    Dim _ChuNhat As Boolean

    Sub New()
        _MaLichGan = 0
        _ThuHai = False
        _ThuBa = False
        _ThuTu = False
        _ThuNam = False
        _ThuSau = False
        _ThuBay = False
        _ChuNhat = False

    End Sub

    Public Property MaLichGan() As Long
        Get
            Return _MaLichGan
        End Get
        Set(ByVal value As Long)
            _MaLichGan = value
        End Set
    End Property

    Public Property ThuHai() As Boolean
        Get
            Return _ThuHai
        End Get
        Set(ByVal value As Boolean)
            _ThuHai = value
        End Set
    End Property

    Public Property ThuBa() As Boolean
        Get
            Return _ThuBa
        End Get
        Set(ByVal value As Boolean)
            _ThuBa = value
        End Set
    End Property
    Public Property ThuTu() As Boolean
        Get
            Return _ThuTu
        End Get
        Set(ByVal value As Boolean)
            _ThuTu = value
        End Set
    End Property
    Public Property ThuNam() As Boolean
        Get
            Return _ThuNam
        End Get
        Set(ByVal value As Boolean)
            _ThuNam = value
        End Set
    End Property
    Public Property ThuSau() As Boolean
        Get
            Return _ThuSau
        End Get
        Set(ByVal value As Boolean)
            _ThuSau = value
        End Set
    End Property
    Public Property ThuBay() As Boolean
        Get
            Return _ThuBay
        End Get
        Set(ByVal value As Boolean)
            _ThuBay = value
        End Set
    End Property
    Public Property ChuNhat() As Boolean
        Get
            Return _ChuNhat
        End Get
        Set(ByVal value As Boolean)
            _ChuNhat = value
        End Set
    End Property

End Class
